home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 22
/
Cream of the Crop 22.iso
/
database
/
pshd32.zip
/
PSHD32.EXE
/
_SETUP.1
/
HAO32S.EXE
/
0
/
RCDATA
/
TSUMMARYDLG
/
TSUMMARYDLG.txt
Wrap
Text File
|
1996-10-12
|
6KB
|
209 lines
object SummaryDlg: TSummaryDlg
Left = 163
Top = 100
Hint = 'Select '#39'Summary By'#39' data field'
ActiveControl = OKBtn
BorderStyle = bsDialog
Caption = 'Summary'
ClientHeight = 362
ClientWidth = 560
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
PixelsPerInch = 96
Position = poScreenCenter
ShowHint = True
OnCreate = FormCreate
OnDestroy = FormDestroy
TextHeight = 13
object Bevel1: TBevel
Left = 8
Top = 8
Width = 465
Height = 345
Shape = bsFrame
IsControl = True
end
object Label1: TLabel
Left = 16
Top = 20
Width = 73
Height = 13
Caption = 'Summary By:'
end
object Label2: TLabel
Left = 200
Top = 333
Width = 34
Height = 13
Caption = 'Total:'
end
object Label3: TLabel
Left = 264
Top = 333
Width = 63
Height = 13
Alignment = taRightJustify
AutoSize = False
end
object Label4: TLabel
Left = 328
Top = 333
Width = 83
Height = 13
Alignment = taRightJustify
AutoSize = False
end
object OKBtn: TBitBtn
Left = 476
Top = 8
Width = 77
Height = 27
Hint = 'Close Summary Window'
Caption = '&Close'
TabOrder = 0
Kind = bkOK
Margin = 2
Spacing = -1
IsControl = True
end
object HelpBtn: TBitBtn
Left = 476
Top = 40
Width = 77
Height = 27
Hint = 'Display Help Window'
TabOrder = 1
OnClick = HelpBtnClick
Kind = bkHelp
Margin = 2
Spacing = -1
IsControl = True
end
object StringGrid1: TStringGrid
Left = 16
Top = 40
Width = 452
Height = 289
ColCount = 4
DefaultRowHeight = 16
FixedCols = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
RowCount = 17
TabOrder = 2
OnDrawCell = StringGrid1DrawCell
ColWidths = (
250
58
83
38)
end
object ComboBox1: TComboBox
Left = 90
Top = 16
Width = 145
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 3
OnChange = ComboBox1Change
end
object BitBtn1: TBitBtn
Left = 476
Top = 72
Width = 77
Height = 27
Hint = 'Display Graph'
Caption = '&Graph'
Default = True
Enabled = False
TabOrder = 4
OnClick = BitBtn1Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300030003
0003333377737773777333333333333333333FFFFFFFFFFFFFFF770000000000
0000777777777777777733039993BBB3CCC3337F737F737F737F37039993BBB3
CCC3377F737F737F737F33039993BBB3CCC33F7F737F737F737F77079997BBB7
CCC77777737773777377330399930003CCC3337F737F7773737F370399933333
CCC3377F737F3333737F330399933333CCC33F7F737FFFFF737F770700077777
CCC77777777777777377330333333333CCC3337F33333333737F370333333333
0003377F33333333777333033333333333333F7FFFFFFFFFFFFF770777777777
77777777777777777777333333333333333333333333333333330000}
Margin = 2
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object SortBy: TRadioGroup
Left = 478
Top = 144
Width = 81
Height = 65
Caption = 'Sort By'
ItemIndex = 0
Items.Strings = (
'Name'
'Value')
TabOrder = 6
OnClick = SortByClick
end
object BitBtn2: TBitBtn
Left = 476
Top = 104
Width = 77
Height = 27
Hint = 'Print Summary'
Caption = '&Print'
Default = True
Enabled = False
TabOrder = 5
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
Margin = 2
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object DetailShell1: TDetailShell
OnBodyBefore = DetailShell1BodyBefore
OnRowPrint = DetailShell1RowPrint
OnRowAfter = DetailShell1RowAfter
Left = 496
Top = 216
end
object ReportSystem1: TReportSystem
TitleSetup = 'Report Setup'
TitleStatus = 'Report Status'
TitlePreview = 'Report Preview'
SystemSetups = [ssAllowCopies, ssAllowCollate, ssAllowDuplex, ssAllowDestPreview, ssAllowDestPrinter, ssAllowDestFile, ssAllowPrinterSetup]
SystemFiler.StatusFormat = 'Generating page %p'
SystemPreview.ZoomFactor = 100.000000000000000000
SystemPrinter.MarginBottom = 1.000000000000000000
SystemPrinter.MarginTop = 1.000000000000000000
SystemPrinter.ScaleX = 100.000000000000000000
SystemPrinter.ScaleY = 100.000000000000000000
SystemPrinter.StatusFormat = 'Printing page %p'
SystemPrinter.Title = 'ReportPrinter Report'
SystemPrinter.UnitsFactor = 1.000000000000000000
OnPrint = ReportSystem1Print
Left = 496
Top = 264
end
end